home *** CD-ROM | disk | FTP | other *** search
/ Freelog 10 / Freelog010.iso / Prog / Algo / algo de convertisseur.txt next >
Text File  |  2000-04-18  |  2KB  |  74 lines
  1.  
  2.  
  3.   C = rΘel  rem : C=temperature en degrΘ Celsius
  4.   D = rΘel  rem : D=temperature maximum
  5.   F = rΘel  rem : F=temperature minimum
  6.   I = rΘel   rem : I=nombre des temperatures α afficher
  7.   pas = rΘel  rem : pas=ecart entre 2 tempΦratures
  8.  
  9. (rem=remarque=information sur le programme) 
  10. rem : definition de l'Θcart de tempΦrature
  11.  
  12.  
  13. Debut programme
  14.  
  15. lire ecart
  16.  
  17. si ecart = "a" faire
  18.      pas = 1
  19. fin si
  20. si ecart = "b" faire
  21.      pas = 2
  22. fin si
  23. si ecart = "c" faire
  24.      pas = 3
  25. fin si
  26. si ecart = "d" faire
  27.      pas = 4
  28. fin si
  29. si ecart = "e" faire
  30.      pas = 5
  31. fin si
  32.    
  33.   
  34. si pas = "" faire
  35.      afficher message : "Vous devez saisir une lettre entre a et e"
  36. sinon
  37.  
  38.    
  39.     rem : controle de la saisie des limites des tempΦratures
  40.      lire temperature minimum
  41.      lire temperature maximum
  42.   
  43.   Si temperature minimum = "" ou temperature maximum = "" ou temperature maximum < temperature minimum faire
  44.     afficher message : "Bornes numΘriques obligatoires"
  45.   sinon
  46.  
  47.     rem : contr⌠le du nombre de rΘsultats α afficher
  48.   
  49.     T = temperature maximum - temperature minimum
  50.     I = T / pas
  51.  
  52.     si I > 20 faire
  53.       afficher message = "modifiez vos donnΘes : Le nombre de rΘsultats est > α 20"
  54.     sinon
  55.  
  56.       rem : calcul de la conversion Celsius->Farenheit
  57.  
  58.       i=D
  59.       pour C = D α F faire
  60.         i=i+pas
  61.           resultat =  (((C x 9 / 5) + 32))
  62.           afficher resultat
  63.       fin pour
  64.  
  65.     fi si
  66.  
  67.   fin si
  68.  
  69. fin si
  70.  
  71. Fin programme
  72.  
  73.  
  74.